home *** CD-ROM | disk | FTP | other *** search
- object DiskSpaceForm: TDiskSpaceForm
- Left = 597
- Top = 103
- BorderStyle = bsToolWindow
- Caption = ' - Not enough free space'
- ClientHeight = 147
- ClientWidth = 400
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = False
- Position = poOwnerFormCenter
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object llDiskSpaceText1: TTntLabel
- Left = 48
- Top = 8
- Width = 270
- Height = 13
- Caption = 'There is not enough free space on the following volumes:'
- end
- object llDiskSpaceText2: TTntLabel
- Left = 48
- Top = 104
- Width = 126
- Height = 13
- Caption = 'What would you like to to?'
- end
- object imIcon: TTntImage
- Left = 8
- Top = 8
- Width = 32
- Height = 32
- Picture.Data = {<image000.ico>}
- Transparent = True
- end
- object lvDiskSpace: TTntListView
- Left = 48
- Top = 23
- Width = 345
- Height = 79
- Columns = <
- item
- Caption = 'Volume'
- Width = 131
- end
- item
- Alignment = taRightJustify
- Caption = 'Size'
- Width = 70
- end
- item
- Alignment = taRightJustify
- Caption = 'Free'
- Width = 70
- end
- item
- Alignment = taRightJustify
- Caption = 'Lacking'
- Width = 70
- end>
- ColumnClick = False
- ReadOnly = True
- RowSelect = True
- TabOrder = 0
- ViewStyle = vsReport
- end
- object btCancel: TScPopupButton
- Left = 296
- Top = 120
- Width = 99
- Height = 25
- TabOrder = 1
- TabStop = True
- ItemIndex = 0
- Caption = 'Cancel'
- ImageIndex = 6
- ImageList = MainForm.ilGlobal
- OnClick = btCancelClick
- end
- object btForce: TScPopupButton
- Left = 192
- Top = 120
- Width = 99
- Height = 25
- TabOrder = 2
- TabStop = True
- ItemIndex = 0
- Caption = 'Force copy'
- ImageIndex = 1
- ImageList = MainForm.ilGlobal
- OnClick = btForceClick
- end
- end
-